﻿Imports System.Xml

Public Class ConfigTools

    Private cfg As String
    Private xmlfile As New XmlDocument

    Public Sub New()
        xmlfile.Load("config.xml")

        Dim node As XmlNode = xmlfile.DocumentElement
        Dim node2 As XmlNode

        For Each node In node.ChildNodes

            Console.WriteLine("[" & node.Name & "]")
            Console.WriteLine(node.SelectSingleNode("nanetto0").Attributes("pippo").Value)
            For Each node2 In node.ChildNodes
                Console.WriteLine(node2.InnerText)
            Next

        Next

    End Sub

End Class
